home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Special 21 / AMIGAplus Sonderheft 21 (1999)(ICP)(DE)[!].iso / PublicDomain / Anwendungen / RecentScript / Plugins / RecentScript.mm < prev    next >
Text File  |  1999-08-23  |  890b  |  35 lines
  1. /*****
  2.   $VER: RecentScript MailManager PlugIn 0.3 (18.4.98) ©Eugene Stepanoff
  3.  
  4.         RecentScript PlugIn for email reader MailManager.
  5.  
  6.   Starts the MUIRexx application 'RecentScript' within
  7.   MailManager.
  8.  
  9.   Based on MM_UserInfo by Erik Børsting & Kasper B. Graversen
  10.   Changed (V0.3) by Arndt van der Molen: Added stacksize primitive
  11.  
  12.   Installation:
  13.  
  14.   Add following line to the browse menu
  15.  
  16.   #BROWSEMENU "RecentScript" "rx MUIRexx:RecentScript/Plugins/RecentScript.mm %a %n" ""
  17. *****/
  18.  
  19. address mailmanager
  20. parse arg tagname msgno
  21. mm_readmsg '"'tagname'"' msgno aminet
  22. if rc = 4 then call error
  23. mm_writestem 'T:RS.temp' aminet.text
  24.  
  25. PRAGMA("STACK", 15000)
  26.  
  27. address command 'MUIRexx:MUIRexx "MUIRexx:RecentScript/RecentScript.rexx T:RS.temp" PORT RECENTSCRIPT'
  28. address command 'delete >NIL: T:RS.temp'
  29.  
  30. exit
  31.  
  32. error:
  33. mm_requester 'ERROR!' 'Unknown Area or Unknown Message' '*_Ok'
  34. exit
  35.